-- card: 2385 from stack: in -- bmap block id: 10171 -- flags: 0000 -- background id: 2209 -- name: dynamic ----- HyperTalk script ----- on opencard hide card field "hexval" hide card field "optd" end opencard on idle put peeklong(H16A) into card field "ticks" put peekbyte(H172) into card field "MbState" put peeklong(H174)&peeklong(H178) into card field "KeyMap" put peeklong(H17C)&peeklong(H180) into card field "KeyPadMap" put peekword(H184) into card field "KeyLast" put peeklong(H20C) into card field "time" put Peekword(H830)&&peekword(H832) into card field "mouseloc" --put peekword("88C") into card field "curdata" put peeklong("88E") into card field "curdata" put peekbyte("8D2") into card field "curvis" end idle -- part 1 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=85 top=66 right=83 bottom=220 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: time -- part 2 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=139 top=99 right=116 bottom=274 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: MbState -- part 3 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=91 top=129 right=146 bottom=226 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ticks -- part 4 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=123 top=38 right=55 bottom=258 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: mouseloc -- part 5 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=109 top=163 right=180 bottom=244 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: keymap -- part 6 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=105 top=194 right=211 bottom=240 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: keypadmap -- part 7 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=109 top=227 right=244 bottom=244 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: keylast -- part 9 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=171 top=260 right=277 bottom=245 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: CurData -- part 12 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=117 top=284 right=301 bottom=158 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: curvis -- part 13 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=136 top=279 right=291 bottom=151 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: optD ----- HyperTalk script ----- on mouseUp show card field "optD" wait until the mouseclick hide card field "optD" end mouseUp -- part 14 (field) -- low flags: 81 -- high flags: 0004 -- rect: left=159 top=182 right=301 bottom=476 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: OptD -- part 15 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=196 top=32 right=44 bottom=212 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: info ----- HyperTalk script ----- on mouseUp show card field "hexval" wait until the mouseclick hide card field "hexval" end mouseUp -- part 16 (field) -- low flags: 81 -- high flags: 2004 -- rect: left=225 top=25 right=145 bottom=497 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: hexval -- part 17 (button) -- low flags: 00 -- high flags: A000 -- rect: left=0 top=296 right=340 bottom=53 -- title width / last selected line: 0 -- icon id / first selected line: 30557 / 30557 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Options ----- HyperTalk script ----- on mouseUp visual effect iris close slowly go card "options" end mouseUp -- part 18 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=50 top=254 right=273 bottom=173 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: New Button ----- HyperTalk script ----- on mouseUp show card field "curdatahelp" wait until the mouseclick hide card field "curdatahelp" end mouseUp -- part 19 (field) -- low flags: 81 -- high flags: 0004 -- rect: left=177 top=205 right=257 bottom=473 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: curdatahelp -- part contents for card part 3 ----- text ----- 0001973C -- part contents for card part 2 ----- text ----- 80 -- part contents for card part 5 ----- text ----- 0000000000000000 -- part contents for card part 6 ----- text ----- 0000000000000000 -- part contents for card part 7 ----- text ----- 0000 -- part contents for card part 1 ----- text ----- 9FE829C5 -- part contents for card part 4 ----- text ----- 0174 0061 -- part contents for card part 9 ----- text ----- B3524081 -- part contents for card part 12 ----- text ----- 00 -- part contents for card part 14 ----- text ----- To see the cursor disappear, type any character key. When the cursor disappears, you will see the value of the field CursorVis change to 01. (Click the mouse to continue) -- part contents for card part 16 ----- text ----- All values shown on this card are in hexadecimal. You may alter the script in this card to show decimal values instead by using the HexToDec XFCN included with this stack. (Click the mouse to continue) -- part contents for card part 19 ----- text ----- This field is not valid on a Macintosh II. Click the mouse to continue.